Xenosoft 2/Xenosoft 2 (Game collection)(1994).iso/bioforge/script/jrood.scp

Text File | 1994-11-07 | 5KB | 258 lines

// THIS IS RUN WHEN THE PLAYER HITS ALT_S
// SECTION #S AND DESCRIPTIONS REFERENCE REFERENCE THE
// BIOFORGE SCREENPLAY 2/14/94

// ALPHA TEST SECTION - SET #1 & #2
// 'A' FOLLOWS TEST # TO ALLOW FOR SWITCHING TEST SETS

// 7.01 LEX'S PIM IS ACCESS BY 'I'


// SET #2 TEST 1-9

{ JROOD_TEST0
//    IF ( @ISCARRYING(ANYTHING, CAYARM) ) THEN
//        CAPTION("/!Anything")
//    IF ( @ISCARRYING(RTHAND, CAYARM) ) THEN
//        CAPTION("/!RTHAND")
//    COLLISIONS CURFIG OFF
//    CAPTION( "/!Collisions Off!")
    //ADDLOGENTRY( "LEX", "TEST" )
    @Çì      FULLY_OPEN_CELL_DOOR
    ^ä£        = $é║
    ^åá             = 1
}

{ JROOD_TEST1
    // CAYNAN'S ACCESS # (DIFFERENT EVERY GAME)
    // RANDOM NUMBERS FOR EACH DIGIT
    ^ç╖                  = 1
    ^ç╕                  = 1
    ^ç╣                  = 1
    ^ç║                  = 1
    ^ç╗                  = 1

    // ESCHER ID VARIABLES
    ^ïå                  = 1
    ^ïç                  = 1
    ^ïê                  = 1
    ^ïë                  = 1
    ^ïè                  = 1

}

{ JROOD_TEST2
    // CAYNAN'S ACCESS # (DIFFERENT EVERY GAME)
    // RANDOM NUMBERS FOR EACH DIGIT
    ^ç╖                  = @Çà     0 9
    ^ç╕                  = @Çà     0 9
    ^ç╣                  = @Çà     0 9
    ^ç║                  = @Çà     0 9
    ^ç╗                  = @Çà     0 9

    // ESCHER ID VARIABLES
    ^ïå                  = @Çà     0 9
    ^ïç                  = @Çà     0 9
    ^ïê                  = @Çà     0 9
    ^ïë                  = @Çà     0 9
    ^ïè                  = @Çà     0 9

}

{ JROOD_TEST3
    ^ïï                     = 0
    Q       "_bio_results_restricted set to 0"
}

{ JROOD_TEST4
    Q       "Escher Id: %d %d %d %d %d"    ^ïå                  ^ïç                  ^ïê                  ^ïë                  ^ïè
}

{ JROOD_TEST5
    P        ~ÇÇ

    // REACTOR ID VARIABLES
    ^ïî                  = 0

    // FIRST, MAKE A NUMBER THAT CONTAINS THREE OF THE FIVE
    // POSSIBLE NUMBERS, LIKE 1,4,5  -KLD
    :MAKEREACTORID
    a      ( ^ïî                 , @Çà    ( 1, 5 ) )
    ~ÇÇ    = @Ç»       ( ^ïî                 , 1, 5 )
    I ( ~ÇÇ    < 3 ) THEN
        J    #Çå

    // NOW, MAKE A NUMBER THAT CAN BE DISPLAYED THAT SHOWS THE
    // THREE NUMBERS IN ORDER, LOWEST NUMBER FIRST, LIKE 145.  -KLD
    ^ïì                = 0
    ~ÇÇ    = 1

    :MAKEEQUIVALENTNUMBER
    ^ïì                *= 10
    I ( @ÇÅ     ( ^ïî                 , ~ÇÇ    ) == 1 ) THEN
        ^ïì                += ~ÇÇ
    ~ÇÇ    += 1
    I ( ~ÇÇ    <= 5 ) THEN
        J    #Çç

    Q       "Reactor Id: %d %d" ^ïì                ^ïî
}

{ JROOD_TEST6
    @Ç¢              ( CONBOT )
    K
    @Ç¢              ( REACTBOT )
    K
    @Ç¥   READY_DROGG1
    @Ç¥   ASSIGNRANDOMIDS
}

// USE THIS TO ENTER THE TEMPLE MONITOR
{ JROOD_TEST7
    ^â┤              = 1
    ^ç£              = $Ç╝
    ^çô              = $Ç╝
    // TURN ON THE TEMPLE TUBE
    a       ^éª        1
    e          WTALKY
    f         INVENTORY
    @Ç¥   SETUPMARINES
}

// USE THIS TO ENTER THE GRAVITY RING
{ JROOD_TEST8
    e          TONFA
    f         RTHAND
    e          WTALKY
    f         INVENTORY
    // TURN ON THE GRAVITY RING TUBE
    a       ^éª        2
    ^é¿        = 1
}

{ JROOD_TESTID
    //COLLISIONS CURFIG ON
    //CAPTION( "/!Collisions On!")
    // RANDOM NUMBERS FOR EACH DIGIT
    ^ç╖                  = 1
    ^ç╕                  = 2
    ^ç╣                  = 3
    ^ç║                  = 4
    ^ç╗                  = 5
    Q      ( "/!Caynan's id changed to 12345.")
}

// 7.02 CELL THREE/LEX'S LOG
{ JROOD_TESTLEXLOG
    @Çì      CT_LEXSLOG
}

// 7.03 CELL ONE/CAYNON'S LOG
{ JROOD_TESTCAYLOG
    //@PROCESS CO_CAYNANSLOG
    @Çì      GR_SECURITYMONITOR
}

// 7.04 CELLBLOCK CORRIDOR/CIRCUIT BOARD
{ JROOD_TESTCIRCUIT
    @Çì      CC_CIRCUITBOARD
}

// 7.05 GUARD ROOM/CELL ONE MONITOR
{ JROOD_TESTCELL1
    @Çì      GR_CELLMONITOR 1
}

// 7.06 GUARD ROOM/CELL TWO MONITOR
{ JROOD_TESTCELL2
    @Çì      GR_CELLMONITOR 2
}

// 7.07 GUARD ROOM/CELL THREE MONITOR
{ JROOD_TESTCELL3
    @Çì      GR_CELLMONITOR 3
}

// 7.08 GUARD ROOM/CELL FOUR MONITOR
{ JROOD_TESTCELL4
    @Çì      GR_CELLMONITOR 4
}

// 7.09 GUARD ROOM/CELLBLOCK DATA MONITOR
{ JROOD_TESTCELLBLOCK
    //@PROCESS GR_CELLBLOCKDATAMONITOR
    @Ç¥   CO_CAYNANSLOG
}

// 7.10 CELL FOUR/DANE'S LOG
{ JROOD_TESTDANELOG
    @Çì      CF_DANESLOG
}


// SET #2 TEST 1-9

// 7.11 GUARD ROOM/PALM READER
//{ JROOD_TEST1
//    @PROCESS GR_PALMREADER
//}

// 7.12 GUARD ROOM/ROBOT CONTROL PANEL
{ JROOD_TESTROBO
    @Çì      ROBOT_MONITOR
}

// 7.13 GUARD ROOM/MAINTENANCE LOG
{ JROOD_TESTMAINT
    @Ç¥   GR_MAINTENANCELOG
}

// 7.14 GUARD ROOM/SECURITY MONITOR
{ JROOD_TESTSEC
    @Çì      GR_SECURITYMONITOR
}

// 7.15 CRYO ROOM/FREEZER MONITOR
{ JROOD_TESTCRY
    @Çì      CRYM_USE
}

// 7.16 ELEVATOR/ELEVATOR CONTROLS
{ JROOD_TEST6A
    @Çì      CRYM_USE
}

// SKIP IN SECTION #S 7.17-7.31

// 7.32 DROPSHIP INTERIOR/GUNNERY STATION
{ JROOD_TESTGUNSTA
    @Çì      DI_GUNNERY STATION
}

// SKIP IN SECTION #S 7.33-7.34

// 7.35 TUBEWAY STATION/TUBE ACTIVATION MONITOR
{ JROOD_TESTTUBE
    @Ç¥   TS_TUBEACTIVATIONMONITOR
}

// 7.36 TUBEWAY STATION/CAMERA VIEWS - OPEN TEMPLE
{ JROOD_TESTTEMPLE
    @Çì      TS_CAMERAVIEWSOPENTEMPLE
}




// BETA TEST SECTION - SET #1 & #2
// 'B' FOLLOWS TEST # TO ALLOW FOR SWITCHING TEST SETS


// SET #2 TEST 1-9

{ JROOD_TESTHANGER
    @Çì      HANGER_MONITOR
}

//$ 26 - version number